
# ------------------------------------------------------------------------------
# Replication Materials
# 
# title: Eliciting Beliefs as Distributions in Online Surveys
# journal: Political Analysis
# authors: Lucas Leemann, Richard Traunmüller, and Lukas Stoetzer
# date: August 2020
# ------------------------------------------------------------------------------

# Master File



# This file calls all other code files
# Tables and Plots and written into subdirectory "out/"



start.time <- Sys.time()

library(tidyverse) # CRAN v1.3.0
library(xtable)    # CRAN v1.8-4
options(xtable.comment = FALSE)
source("fun/fun_electbeleifs_MLE.R")
source("fun/fun_utilities.R")




source("02_BeliefsMLE_covariates.r")

source("02_BeliefsMLE_ind.r")

source("02_BeliefsMLE_noscrn.r")

source("02_BeliefsMLE_Qauntile.r")

source("02_BeliefsMLE.r")

source("03_BeliefsMLE_addon.R")



# Balance tesst

source("01_BalanceTests.R")



# Time for surveys
source("01_Time_Analysis.R")


end.time <- Sys.time()
end.time - start.time


